home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / K-L / LImacSTACK11⁄89.cpt / Using Repeat / card_5566.txt < prev    next >
Text File  |  1989-11-02  |  812b  |  35 lines
  1. -- card: 5566 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 2687
  5. -- name: 
  6.  
  7.  
  8. -- part contents for background part 8
  9. ----- text -----
  10. repeat with <variable> = <high> down to <low>
  11.  
  12. -- part contents for background part 24
  13. ----- text -----
  14. repeat with i = the number of lines in field script down to 1
  15.    put empty into line i of fld "script"
  16. end repeat
  17.  
  18. wait 60
  19. send mouseUp to bg btn "Reset field to Original"
  20.  
  21.  
  22. -- part contents for background part 26
  23. ----- text -----
  24. repeat with i = the number of lines in field script down to 1
  25.    put empty into line i of fld "script"
  26. end repeat
  27.  
  28. wait 60
  29. send mouseUp to bg btn "Reset field to Original"
  30.  
  31.  
  32. -- part contents for background part 30
  33. ----- text -----
  34. Each time through the loop the variable is decreased by 1 until it reaches the low number.
  35.